home *** CD-ROM | disk | FTP | other *** search
/ CD Fun House 1 / CD Fun House (Wayzata Technology).iso / •AdventureLand• / Adventures / SpaceEscape •••• / SpaceEscape ееее / card_26434.txt < prev    next >
Text File  |  1990-10-02  |  3KB  |  122 lines
  1. -- card: 26434 from stack: in
  2. -- bmap block id: 17199
  3. -- flags: 4000
  4. -- background id: 8902
  5. -- name: drool2
  6. ----- HyperTalk script -----
  7. on opencard
  8.   put "This is your typical Droolish guard: big, stupid, and very, "& "very strong ...smelling.  At the moment he seems to be concentrat"& "ing on lifting the dumbell.  He is the guard who is supposed to "& "be guarding the bunker."into field "info"
  9.   pass opencard
  10. end opencard
  11.  
  12.  
  13.  
  14. -- part 1 (button)
  15. -- low flags: 00
  16. -- high flags: A003
  17. -- rect: left=161 top=302 right=323 bottom=192
  18. -- title width / last selected line: 0
  19. -- icon id / first selected line: 0 / 0
  20. -- text alignment: 1
  21. -- font id: 0
  22. -- text size: 12
  23. -- style flags: 0
  24. -- line height: 16
  25. -- part name: OK
  26. ----- HyperTalk script -----
  27. on mouseUp
  28.   global filter
  29.   if filter is "yes" then
  30.     beep
  31.     exit mouseup
  32.   end if
  33.   global donteat
  34.   get bkgnd field "do what"
  35.   if the number of words in it > 1 then
  36.     beep 2
  37.     oneword
  38.     exit mouseup
  39.   end if
  40.   if it contains "examine" or it contains "look" then
  41.     send "opencard" to this card
  42.     exit mouseup
  43.   end if
  44.   if it contains "hit" or it contains "kick" or it contains "punch" or it contains "push" or it contains "attack" or it contains "kill" then
  45.     play "boing"
  46.     put "When you hit the Drool, he goes wild and hits you.  Very "& "hard.  To make a long story short, he kills you.≈∏"into field"info"
  47.     global filter
  48.     put "yes" into filter
  49.     global action
  50.     put "attack" into action
  51.     exit mouseup
  52.   end if
  53.   if it contains "eat" or it contains "consume" then
  54.     put "When you bite the Drool, he goes wild and hits you.  Very "& "hard.  To make a long story short, he kills you.≈∏"into field"info"
  55.     global filter
  56.     put "yes" into filter
  57.     global action
  58.     put "attack" into action
  59.     exit mouseup
  60.   end if
  61.   if it contains "talk" or it contains "speak" then
  62.     put "The Drool is not listening."into field"info"
  63.     exit mouseup
  64.   end if
  65.   if it contains "give" or it contains "offer"then
  66.   ask "What would you like to give the Drool?"
  67.   if it contains "booze" or it contains "bottle" or it contains "drink" or it contains "liquor" then
  68.     global booz
  69.     if booz is "empty" then
  70.       put "The Drool takes one look at the empty bottle and loses"& " interest. "into field "info"
  71.       exit mouseup
  72.     end if
  73.     global boozer
  74.     put "yes" into boozer
  75.     put "The Drool stops his exercising, takes the bottle, and "& "with a mischievous little giggle, walks away.≈∏" into field "info"
  76.     global inventory
  77.     get offset ("Booze",inventory)
  78.     put "" into char it  to 4 +it  of inventory
  79.     global droolhide
  80.     put "yes" into droolhide
  81.     global action
  82.     put "yah" into action
  83.     global filter
  84.     put "yes" into filter
  85.     exit mouseup
  86.   else
  87.     put "The Drool is not interested in the "&it&"." into field "Info"
  88.     exit mouseup
  89.   end if
  90. end if
  91. if it is "" then
  92.   put "Speak up.  I can't hear you." into field "info"
  93.   exit mouseup
  94. end if
  95. idunno
  96. end mouseUp
  97.  
  98. on cont
  99.   global filter
  100.   if filter is "yes" then
  101.     global action
  102.     if action is "attack" then
  103.       go to card "death"
  104.       put "" into filter
  105.     end if
  106.     if action is "yah" then
  107.       go to card "rec room"
  108.       global filter
  109.       put "" into filter
  110.     end if
  111.   end if
  112. end cont
  113.  
  114.  
  115.  
  116. -- part contents for background part 2
  117. ----- text -----
  118. What would you like to do with the Art?
  119.  
  120. -- part contents for background part 7
  121. ----- text -----
  122. Guard